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/" 

*/ 
/* 
*/ 
/* 
*/ 
/* 
*/ 
/* 
*/ 
/* 
*/ 

/ 

/* Module name : Brain Agenda - Personal Information Manager 
*/ 

/* NEURON_1000 
*/ 

/************************************** 
/ 

/* Implemented : RAIMA, db_VISTA III 

*/ 

/* 

*/ 

/* Compile type : ddp 
*/ 
/* 
*/ 
/* 
*/ 
/* 
*/ 
/* 
*/ 

/* d - dupl. field names 

*/ 

/* s - case preserve 



def. ddlp -rxbds brain. ddl 
-r - report 
x - cross reference 
b - no alignment 



*/ 

/ 

/* 1. i BRAIN | 1991.09.01 | New 
*/ 

/ 

/* 1000-0-00-00-00 6144*/ 
database BRAIN [6144] 
{ 

data file "F100010 . 00" contains 
/* 1000-0-10-00-00 */ 



noun; 



data file "F100011 . 00" contains 
/* 1000-0-11-00-00 */ 



FIG. 17B 



datar, 
datar_tabl; 
a file "F100012 .00" contains 
000-0-11-00-00 */ 

noun_datar / 
noun_str, 

datar_str, 

action_af ter ; 

data file "F100019.00" contains 
/* 1000-0-10-00-00 */ 

brain, 

/* 1000-0-50-00-00 */ 

note; 
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noun_synonim / 
action before, 



key file "F100010 . 00K" contains 

noun. id; 

key file "F100011 . 00K" contains 

datar . id; 

key file "F100019 . 00K" contains 

note . id; 

/ 

/* Sub-schema : BRAIN - NOUN 

*/ 

/* Description : Noun (Parameter) part of BRAIN 

V 

/ 

/* Record type : brain 
*/ 

/* Description : Start of the NEURON 1000 
*/ 

/ 

record brain 

{ 

char 
char 
struct 
{ 

long 

char 

long 
} id_v; 

char 
struct 

{ 

long 
char 
long 
long 



db_path [81]; 
db name [81]; 



/* Path to database */ 
/* name of the db "brain" */ 



type_v; /* noun type, view id */ 

kname_v [41]; /* noun 40B + IB null termin*/ 

subtype_v; /* noun subtype, def = 0 */ 

name v [256] ; /* V 



type_n; /* noun type, name id */ 

kname_n [41]; /* noun 40B + IB null termin*/ 

subtype_n; /* noun subtype, def = 0 */ 

type2_n; /* noun 2 type, def =0 */ 
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char kname2_n [41];/* noun 40B + IB null termin*/ 

long subtype2_n; /* noun subtype, def =0 */ 
} id_n; 

char name_n [256] ; /* 

*/ 



long 


read action; 


/* 


action on load */ 


long 


next 1; 




/* 


next available ??? */ 


long 


next_2; 




/* 


number for extention */ 


long 


next 3; 




/* 


noun ext., noun definition*/ 


long 


value_l , 




/* 


*/ 


long 


value_2 




/* 


*/ 


long 


value_3 




/* 


*/ 


double 


double_l 




/* 


*/ 


double 


double_2, 




/* 


*/ 


double 


double 3, 




/* 


*/ 


char 


reserve_l [41] ; 


/* 


*/ 


char 


reserve 2 [41] ; 


/* 


*/ 


char 


free [5001] ; 


/* 


*/ 



} 

/ 

/* Record type : noun 
*/ 

/* Description : names (views, names, contexts) 
*/ 

/ 

record noun 
{ 

unique key struct 
{ 

long type; /* noun type, def = 0 */ 

char kname [41]; /* noun 40B + IB null termin*/ 

long subtype; /* noun subtype, def =0 */ 

long type2; /* noun 2 type, def =0 */ 

char kname2 [41];/* noun 40B + IB null termin*/ 

long subtype2; /* noun subtype, def =0 */ 

} id; 

char name [256]; /* 255+1 */ 

struct 
{ 



long 


type_p; 




/* 


noun type, pair id 


*/ 


char 


kname p 


[41]; 


/* 


noun 4 OB + IB null termin 


*/ 


long 


subtype_ 


_p; 


/* 


noun subtype, def = 0 


*/ 


id_p; 












long 


cf; 




/* 


certainity factor 


*/ 


long 


delete; 




/* 




*/ 


long 


joint_id; 




/* 


neuron | | joint long 


*/ 


long 


read_action; 




/* 


action on read 


*/ 


double 


date_create; 




/* 




*/ 


double 


date_when; 




/* 




*/ 


double 


date_done; 




/* 




*/ 


double 


date_start; 




/* 




*/ 


double 


date end; 




/* 




*/ 
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char 


short_name [21]; 


/* 


IB 


null terrain*/ 


char 


cat_type [11] ; 


/* 


IB 


null termin*/ 


char 


exclusive [2]; 


/* 


IB 


null terrain*/ 


char 


settings [41]; 


/* 


IB 


null terrain*/ 


long 


layout_link; /* 


type of layout 


for 


linked note*/ 



struct 
{ 

long 

char 

long 
} id__link; 
struct 
{ 

long 
char 
long 
} id_note; 
long 
char 
char 
char 
char 
char 

} 



type_link; /* link to extention which */ 

kname_link [41];/* is in note */ 
subtype link; /*reserve the range of notes*/ 



type_note; 
kname_note [41] ; 
subtype_note; 



position_note 
free_l [101] 
free_2 [101] 
reserve_l [21] 
reserve_2 [11] 
reserve 3 [11] 



/* note id 
/* note name 
/* note page 



*/ 
*/ 
*/ 



/* 



in document /page */ 



/*3 sets person company */ 
/* notes (commence) */ 

/* notes (commence) */ 



/ 

/* Record type : datar */ 

/* Description : records from Brain Agenda 

*/ 

/ 

record datar 



{ 



unique key struct 

type; 



long 
char 
long 
} id; 
char 



/* data type, def =0 */ 
kname [41]; /* data 40B + IB null termin*/ 
subtype; /* data subtype, def =0 */ 



name [256] ; /* 255+1 



long cf; 



*/ 
*/ 



long delete; 

long joint_id; 

long read_action; 
double date_create; 
double date_when; 
double date_done; 
double date_start; 
double date_end; 
char settings [41], 



/* certainity factor 



/* neuron | | joint 

/* action on read 
/* 
/* 
/* 
/* 
/* 
/* 



*/ 
long 

*/ 
*/ 
*/ 
*/ 
*/ 
*/ 

IB null termin*/ 



struct 
{ 
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3& */ 

in document/page */ 
*/ 
*/ 
*/ 
*/ 
*/ 



/* * * * 

/ 

/* Record type : datar_tabl */ 

/* Description : data tables 

*/ 

/ 

record datar_tabl 
{ 



long 


type_note; 


/* 


char 


kname_note [41] ; 


/* 


long 


subtype_note; 


/* 


} id note; 






long 


position note; 


/* 


long 


long_l ; 


/* 


char 


reserve_l [11] ; 


/* 


char 


reserve_2 [ 11 ] ; 


/* 


char 


reserve_3 [ 11] ; 


/* 


char 


reserve_4 [11] ; 


/* 


★a****************************** 



long 


elem [120]; 


/* 


120 elements 


*/ 


long 


cf; 


/* 


certainity factor 


V 


long 


delete; 


/* 




*/ 


double 


date_create; 


/* 




*/ 


long 


read_action; 


/* 


action on read 


*/ 


double 


double_l; 


/* 




*/ 


char 


reserve_l [11] ; 


/* 




*/ 


char 


reserve 2 [21] ; 


/* 




*/ 



} 

/ 

/* Record type : note 
*/ 

/* Description : notes (pages ) document 
*/ 

/ 

record note 
{ 



unique key struct 
{ 



blank*/ 



long 


f rom; 


/* doc id +datar , -name, 0-user 


*/ 


long 


type; 


/* from record or name 


*/ 


char 


kname [41]; 


/* chapter M paragraph | | verse 




long 


subtype; 


/* for user=0 


*/ 


long 


page_nr; 


/* page nr 


*/ 


id; 








char 


name [256] ; 


/* 


V 


long 


cf; 


/* certainity factor 


*/ 


char 


chapter [101]; 


/* left on page 


*/ 


char 


chapter 1[101]; 


/* left on page 


*/ 


char 


chapter_2 [101] ; 


/* left on page 


*/ 


char 


chapter_3 [101] ; 


/* left on page 


*/ 
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char 


chapter 4 [101] , 


/* 


leftdbn page 


char 


chapter 5 [101] , 


/* 


left on page 


char 


chapter_6 [101] , 


/* 


left on page 


long 


verse; 


/* 


left on page 


char 


page [5001]; 


/* 


page 5001 


long 


delete; 


/* 




long 


read_action; 


/* 


action on read 


char 


reserve 1 [11] , 






char 


reserve_2 [11] , 






char 


reserve_3 [ 11] , 






char 


reserve 4 [ 11] , 







Center 2600 

*/ 



} 

/********* ******************************^ 

/ 

/* Record type : noun_str 
*/ 

/* Description : structure of the noun 
*/ 

/ 

record noun_str 
{ 



long 


cf; 


/* 


certainity factor 


*/ 


double 


date_create; 


/* 




*/ 


long 


read_action; 


/* 


action on read 


*/ 


double 


double_l ; 


/* 




*/ 


char 


reserve 2 [11] ; 


/* 




*/ 


char 


reserve_3 [11] ; 


/* 




V 



/ 

/* Record type : noun_datar 
*/ 

/* Description : relation noun - datar */ 
/***************************** **********^ 



record noun datar 



{ 



long cf; 
double date_create ; 
long read_action; 
double double_l ; 
char reserve_2 [11] ; 
char reserve 3[11]; 



/* certainity factor 
/* 

/* action on read 

/* 

/* 

/* 



*/ 

V 
*/ 
*/ 

V 
V 



*********************** 

/ 

/* Record type : action before 
V 

/* Description : must belong to the datar before being assigned to 

V 

/* the current datar */ 

/****************************************^ 

/ 
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record action before 



{ 



long cf; 
double date_create; 
long read_action; 
double double_l; 
char reserve_2 [11] ; 
char reserve_3 [11] ; 
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/* certainity factor 
/* 

/* action on read 

/* 

/* 

/* 



*/ 

*/ 
*/ 
*/ 
*/ 
*/ 



/ 

/* Record type : noun action after 
*/ 

/* Description : is assigned to noun after being assigned to 
*/ 
/* 
*/ 



the current noun 



record action_af ter 

{ 



long 


cf; 


/* 


certainity factor 


*/ 


double 


date_create; 


/* 




V 


long 


read_action; 


/* 


action on read 


*/ 


double 


double_l ; 


/* 




*/ 


char 


reserve_2 [11] ; 


/* 




*/ 


char 


reserve 3 [11] ; 


/* 




V 



/ 

/* Record type : noun_synonim 
*/ 

/* Description : all synonims for a noun 
*/ 



record noun_synonim 
{ 



long 


cf; 


/* 


certainity factor 


*/ 


double 


date__create; 


/* 




*/ 


long 


read_action; 


/* 


action on read 


*/ 


double 


double_l; 


/* 




*/ 


char 


reserve_2 [11] ; 


/* 




*/ 


char 


reserve_3 [11] ; 


/* 




*/ 



/ 

/* Record type : datar_str 
V 

/* Description : structure of the datar 
V 

/****************************************^ 

/ 

record datar str 
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long 


cf; 


/* 


certainity factor 


*/ 


double 


date_create; 


/* 




*/ 


long 


read_action; 


/* 


action on read 


*/ 


double 


double_l; 


/* 




*/ 


char 


reserve_2 [11] ; 


/* 




*/ 


char 


reserve 3 [ 11] ; 


/* 




*/ 



} 

/*************************************** 

/ 

/* Set type : noun_set 
V 

/* Description : Search path for noun 
*/ 

/ 

set noun_set 
{ 

order descending; 

owner brain; 
member noun by cf; 
} 

/***************************************^ 

/ 

/* Set type : datar set 
*/ 

/* Description : Search path for datar record 
*/ 

/ 

set datar_set 

{ 

order descending; 
owner noun; 

member noun_datar by cf; 
} 

/ 

/* Set type : datar_noun set 
V 

/* Description : Search path for noun from datar 
*/ 

/******************************************* 
/ 

set datar_noun_set 
{ 

order descending; 
owner datar; 

member noun_datar by cf; 
} 

/ 

/* Set type : noun_synonim_exp_set 
*/ 
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v!£t/y7i2s>^ /* Description : Search path for noun synonim explosion *• ■ 

*/ 

/ 

set noun_synonim_exp_set 
{ 

order descending; 
owner noun; 

member noun_synonim by cf ; 
} 

/******************************^ 

/ 

/* Set type : noun_synonim_imp_set 
*/ 

/* Description : Search path for noun synonim implosion 
*/ 

/ 

set noun_synonim_imp_set 
{ 

order descending; 
owner noun; 

member noun_synonim by cf; 
} 

/ 

/* Set type : noun_exp_set 
*/ 

/* Description : Search path for noun explosion 
*/ 

/ 

set noun_exp__set 
{ 

order descending; 
owner noun; 

member noun_str by cf; 
} 

/**************************^ 
/ 

/* Set type : noun_imp_set 

*/ 

/* Description : Search path for noun record from noun_str 
*/ 

/************************^ 
/ 

set noun_imp_set 
{ 

order descending; 
owner noun; 

member noun_str by cf; 
} 

/****************************^ 

/ 
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: datar_exp_set 

: Search path for datar explosion 



^ *fc ifr ^fr ^Ar ^Ar ^Ar ^Ar Tfr tAt ^fr tAt t4t ^At ^fr '^c ^fc t^t ^fr t^t t^t t^t tAt ^fr t^t ^At 

/ 

set datar_exp_set 
{ 

order descending; 
owner datar; 
member datar_str by cf; 
} 

/***********************************^ 

/ 

/* Set type : datar_imp_set 

*/ 

/* Description : Search path for datar record from datar_str 
*/ 

/ 

set datar_imp_set 
{ 

order descending; 
owner datar; 
member datar_str by cf; 
} 

/************************^ 

/ 

/* Set type : action_bef ore_exp set 
*/ 

/* Description : Search path for action_bef ore from noun 
*/ 

/ 

set action_before_exp_set 

{ 

order descending; 
owner noun; 

member action_before by cf; 
} 

/ 

/* Set type : action_bef ore_imp set 
*/ 

/* Description : Search path for action_before from noun 
*/ 

/ 

set action_before_imp_set 
{ 

order descending; 
owner noun; 

member action_before by cf; 
} 
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/* Description : Search path for action_after from noun * 
*/ 

/ 

set action_af ter_exp_set 
{ 

order descending; 
owner noun; 

member action_after by cf; 
} 

/**********************************^ 

/ 

/* Set type : action_after_imp set 
*/ 

/* Description : Search path for action_after from noun 
*/ 

/ 

set action_af ter_imp_set 
{ 

order descending; 
owner noun; 

member action__af ter by cf; 
} 

/*************************************★* 

/ 

/* Set type : datar_tabl set 
*/ 

/* Description : Search path for datar_tabl from datar 
*/ 

/ 

set datar_tabl_set 
{ 

order descending; 
owner datar; 

member datar_tabl by cf; 
} 

/* 1000-0-00-00-00 */ 

} 

/ 

/* End of Schema: Brain Agenda 
V 

/ 



FIG. 17L 



RECEIVED 

OCT 1 5 2004 

Technology Center 2600 




FIG. 18 



